home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 48 / Mac Magazin CD 48.iso / Software / Entwickler / Glue Factory folder / CdevGlue folder / CdevInterface.def < prev    next >
Encoding:
Modula Definition  |  1998-01-24  |  919 b   |  39 lines  |  [TEXT/MPS ]

  1. DEFINITION MODULE CdevInterface;
  2. (*
  3.     Interface from cdev to code generated by CdevGlue tool. The code
  4.     generated by the tool defines two global variables, with names
  5.     and types as specified below.
  6.  
  7.     Written by LDO 1996 January 12-13.
  8.     Changed name of tool from CdevFramework to CdevGlue 1998 January 24.
  9. *)
  10.  
  11.     FROM Types IMPORT
  12.         LongCard,
  13.         LongInt,
  14.         ResID,
  15.         ShortInt;
  16.     FROM Events IMPORT
  17.         EventRecordPtr;
  18.     FROM Dialogs IMPORT
  19.         DialogPtr;
  20.  
  21.     TYPE
  22.         CdevArgRecord = (* exact copy of arguments passed to cdev entry point *)
  23.             RECORD
  24.                 CPDialog : DialogPtr;
  25.                 cdevValue : LongInt;
  26.                 TheEvent : EventRecordPtr;
  27.                 CPanelID : ResID;
  28.                 NumItems : ShortInt;
  29.                 Item : ShortInt;
  30.                 Message : ShortInt;
  31.             END (*RECORD*);
  32.         CdevArgPtr = POINTER TO CdevArgRecord;
  33.  
  34.     VAR
  35.         CdevGlobals [EXTERNAL] : CdevArgRecord; (* set up by glue code *)
  36.         CdevCallerA5 [EXTERNAL] : LongCard; (* caller's A5 *)
  37.  
  38. END CdevInterface.
  39.